|
| Find path to file
Set 7bupstats$Dir <Obey$Dir>
|
| ensure not running on < risc os 3.1 (is this really necessary now?)
|
RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.03 RMLoad System:Modules.CallASWI
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.03 Error This application requires CallASWI 0.03 or later
|
| Follow PRM (4:497) advice and prevent multiple running
|
<7bupstats$Dir>.TaskCheck 7bupstats
|
IconSprites <7bupstats$Dir>.!Sprites
|
|
RMEnsure FPEmulator 4.03 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator 4.03 Error This application requires FPEmulator 4.03 or later
RMEnsure SharedCLibrary 5.17 RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 5.34 Error This application requires SharedCLibrary 5.34 or later
|
RMEnsure Toolbox    0.00  RMLoad System:modules.toolbox.toolbox
RMEnsure Toolbox    1.36  ERROR 7bupstats needs Toolbox 1.36 or later
RMEnsure Window     0.00  RMLoad System:modules.toolbox.window
RMEnsure Window     1.31  ERROR 7bupstats needs Window 1.31 or later
RMEnsure Menu       0.00  RMLoad System:modules.toolbox.menu
RMEnsure Menu       0.23  ERROR 7bupstats needs Menu 0.23 or later
RMEnsure Iconbar    0.00  RMLoad System:modules.toolbox.iconbar
RMEnsure Iconbar    1.11  ERROR 7bupstats needs Iconbar 1.11 or later
RMEnsure ProgInfo   0.00  RMLoad System:modules.toolbox.proginfo
RMEnsure ProgInfo   0.05  ERROR 7bupstats needs ProgInfo 0.05 or later
|
| Check memory allocation
WimpSlot -min 64K -max 64K
|WimpSlot -min 240K -max 240K
|
| Now start program
Run <7bupstats$Dir>.!RunImage
